* font.c (font_delete_unmatched): Now static.

diff --git a/src/ChangeLog b/src/ChangeLog
index ba1bd03265bb8a6b9282d5916fa4a7ed2c0b0cb6..63e23749374a1b132f0590b559c8809f2a5a332f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,7 @@
        * font.c (font_unparse_xlfd): Don't mix pointers to variables with
        pointers to constants.
        (font_parse_fcname): Remove unused vars.
+       (font_delete_unmatched): Now static.
 
        * fns.c (require_nesting_list, require_unwind): Now static.
        (Ffillarray): Rename locals to avoid shadowing.

diff --git a/src/font.c b/src/font.c
index 16812255e8775e9c2480d68ac6ea312894efcff4..25e2968df7f0466d66fe11942ac93b379cbbe867 100644 (file)
--- a/src/font.c
+++ b/src/font.c
@@ -2600,7 +2600,7 @@ static Lisp_Object scratch_font_spec, scratch_font_prefer;
      (2) doesn't match with any regexps in Vface_ignored_fonts (if non-nil).
 */
 
-Lisp_Object
+static Lisp_Object
 font_delete_unmatched (Lisp_Object vec, Lisp_Object spec, int size)
 {
   Lisp_Object entity, val;